home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / LIBRARY / SWDOS12 / MAXFILES.ASM < prev    next >
Assembly Source File  |  1994-09-14  |  741b  |  25 lines
  1. ;******************************************************************
  2. ;*                          MAXFILES.ASM                          *
  3. ;*          Source file for SoftWeyr enhanced DOS toolbox         *
  4. ;*                           version 1.0                          *
  5. ;*                 Copyright (c) by SoftWeyr,1994                 *
  6. ;******************************************************************
  7. MODEL TPASCAL
  8. LOCALS
  9. .Data
  10.      EXTRN DosError :word
  11. .CODE
  12.        Public MaxFiles
  13. MaxFiles Proc Far Count:Word
  14. ;Procedure MaxFiles(Count:Word);
  15.            MOV Bx,Count
  16.            Mov AH,67H
  17.            Int 21H
  18.            JC @@1
  19.            SUB AX,AX
  20.   @@1:     Mov DosError,AX
  21.            Ret
  22.          endp
  23. end
  24.  
  25.